home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / misc / sci / MathPlot.lha / MathPlot / Macros / test6.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1993-08-08  |  298 b   |  18 lines
  1. /* Test of screentoback/front */
  2.  
  3. address "MPlot_ARexx"
  4. options results
  5.  
  6. if(~show('L','rexxsupport.library')) then do
  7.  if(~addlib('rexxsupport.library',0,-30,0) ) then do
  8.   say "ARexx-support-library not found"
  9.   exit 10
  10.  end
  11. end
  12.  
  13.  
  14. screentofront
  15. a=delay(150)
  16. screentoback
  17. a=delay(150)
  18. screentofront